﻿Imports Microsoft.VisualBasic

Public Class clsAMLList
    Private ThFirstName As String
    Private ThMidName As String
    Private ThLastName As String
    Private EnFirstName As String
    Private EnMidName As String
    Private EnLastName As String
    Private UniqueID As String

    Public Property strThFirstName() As String
        Get
            Return ThFirstName
        End Get
        Set(ByVal value As String)
            ThFirstName = value
        End Set
    End Property

    Public Property strThMidName() As String
        Get
            Return ThMidName
        End Get
        Set(ByVal value As String)
            ThMidName = value
        End Set
    End Property

    Public Property strThLastName() As String
        Get
            Return ThLastName
        End Get
        Set(ByVal value As String)
            ThLastName = value
        End Set
    End Property

    Public Property strEnFirstName() As String
        Get
            Return EnFirstName
        End Get
        Set(ByVal value As String)
            EnFirstName = value
        End Set
    End Property

    Public Property strEnMidName() As String
        Get
            Return EnMidName
        End Get
        Set(ByVal value As String)
            EnMidName = value
        End Set
    End Property

    Public Property strEnLastName() As String
        Get
            Return EnLastName
        End Get
        Set(ByVal value As String)
            EnLastName = value
        End Set
    End Property

    Public Property strUniqueID() As String
        Get
            Return UniqueID
        End Get
        Set(ByVal value As String)
            UniqueID = value
        End Set
    End Property

    Public Sub New()
        ThFirstName = ""
        ThMidName = ""
        ThLastName = ""
        EnFirstName = ""
        EnMidName = ""
        EnLastName = ""
        UniqueID = ""
    End Sub
End Class
